home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1999 March / EnigmA AMIGA RUN 35 (1999)(G.R. Edizioni)(IT)[!][issue 1999-03].iso / earcd / devel / vbcc-68k-src / machines / amiga68k / libsrc / stdio / tmpnam.c < prev    next >
C/C++ Source or Header  |  1999-01-01  |  329b  |  17 lines

  1. #include <stdio.h>
  2.  
  3. #include <proto/exec.h>
  4. #include <dos/dosextens.h>
  5.  
  6. char *tmpnam(char s[L_tmpnam])
  7. {
  8.     static char lastname[L_tmpnam];
  9.     static int lastnum=0;
  10.     int tn = (int) (((struct Process *) FindTask (0))->pr_TaskNum);
  11.  
  12.     if (!s)
  13.       s = lastname;
  14.     sprintf (s, "T:t_%d_%d", tn, lastnum++);
  15.     return s;
  16. }
  17.